home *** CD-ROM | disk | FTP | other *** search
/ Chip 1996 December / CHIP Aralık 1996.iso / prog / backpack / demodata / misc / start.dxr / 00004_Init all variables.ls < prev    next >
Encoding:
Text File  |  1995-08-30  |  926 b   |  38 lines
  1. on exitFrame
  2.   global PNM, J, CHN, C_EXPR, C_KTKM, EXCF_S, CURR_S, PSND, MAXPSNDS, PC_ADR, PC_MESS, GameFileName
  3.   set the colorDepth to 8
  4.   if the colorDepth < 8 then
  5.     alert("This program requires 256 colors!")
  6.     quit()
  7.   end if
  8.   BP_Preferences()
  9.   set EXCF_S to list()
  10.   set CURR_S to list()
  11.   set the floatPrecision to 2
  12.   set the centerStage to 1
  13.   set fixStageSize to 1
  14.   set the timeoutKeyDown to 0
  15.   set the timeoutMouse to 0
  16.   set the timeoutPlay to 0
  17.   if the multiSound then
  18.     set CHN to 2
  19.   else
  20.     set CHN to 1
  21.   end if
  22.   set PSND to "SIL_PAUS.AIF"
  23.   set J to 0
  24.   set J to birth(script "J - The Question Handler Object")
  25.   EXC_Init()
  26.   QN_A_Init()
  27.   set MAXPSNDS to 30
  28.   set C_EXPR to 20
  29.   set C_KTKM to 70
  30.   set GameFileName to EMPTY
  31.   set PC_ADR to EMPTY
  32.   set PC_MESS to EMPTY
  33.   preLoadCast("CP-knapp 1.2 guldgul")
  34.   preLoadCast("CP-knapp 1.2 bl├Ñ")
  35.   preLoadCast("Klick")
  36.   preLoad(label("loop"))
  37. end
  38.